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SECTION  1 - INTRODUCTION 

1.1  PURPOSE  AND  SCOPE 

* r > 

The  purpose  of  the  Management  Aids  Code  Auditor  (MA)  Component  is  to  build  * 

, / 

a data  dictionary  of  all  COMPOOL  items.  The  dictionary  is  a cross-refe»«ence 
list  of  COMPOOL  items  and  modules  with  indicators  showing  whether  the  item 

is  set,  used,  or  both  by  each  module.  It  is  intended  for  use  by  programners 

* 

as  an  aid  to  modifying  or  maintaining  the  CFC  Software  System.  The  data 

dictionary  is  printed  table  by  table  and  is  formatted  with  the  assumption 
» „ 
that  most  of  the  COMPOOL  items  have  the  same  first  two  characters  as  the 

COMPOOL  table  that  they  belong  to.  However,  if  any  of  the  items  are  defined 

without  following  the  above  rule,  these  items  are  printed  under  the  table 

name  'NONE'.  All  the  COMPOOL  items  that  are  locally  defined  in  any  modules 

will  be  printed  in  an  exception  report.  Another  exception  report  of  all  the 

COMPOOL  items  not  referenced  in  any  modules  will  also  be  printed. 

1.2  BACKGROUND  INFORMATION 

The  Jovial  Automated  Verification  System  (JAVS)  has  the  capability  to 
build  and  print  a data  dictionary  of  all  the  items  in  all  the  modules. 

However,  since  this  system  does  not  have  the  capability  of  printing  the 
cross  reference  list  of  COMPOOL  items  alone,  the  need  for  the  present 
data  dictionary  system  arose.  Since  JAVS  output  contains  most  of  the 
information  needed  for  running  the  data  dictionary  build  system,  the 
design  of  the  MA  data  dictionary  build  was  formulated  to  read  the  JAVS 
output  and  select  the  COMPOOL  symbols.  The  user  must  therefore  execute 
the  JAVS  BASIC,  STRUCTURAL,  and  ASSIST  functions  to  create  the  necessary 
input  to  the  data  dictionary  build. 


it 


»■"  ■■ 

I. 


1 . 3 REFERENCES 


For  additional  information,  refer  to  the  JAVS  Reference  Manual,  Volume 
CR-1-722 , Section  5. 
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SECTION  2 - PROGRAM  OPERATION 

The  data  item  dictionary  program  operation  is  briefly  described  in 
Figure  2-1. 

2.1  OVERVIEW 

In  order  to  execute  the  MA  data  item  dictionary  component,  it  is  essential 
to  execute  the  JAVS  BASIC,  STRUCTURAL,  and  ASSIST  components  and  to 
input  all  the  source  modules  whose  cross  reference  is  needed.  The 
execution  of  the  JAVS  components  creates  a sequential  file  of  item/ 
module  cross  reference  file  (this  may  be  created  either  on  disk  or  tape). 

All  the  source  modules  are  submitted  as  input  to  the  JAVS  BASIC  and 
STRUCTURAL  components  one  by  one.  The  JAVS  components  add  the  necessary 
information  in  the  source  modules  to  the  JAVS  library.  It  is  not 
necessary  to  run  the  COMPOOL  source  through  JAVS  BASIC  and  STRUCTURAL 
components.  Running  COMPOOL  source  through  JAVS  is  time  consuming  and 
slows  down  the  processing  of  the  data  ^tem  dictionary  component. 

After  the  source  modules  have  been  run  through  the  JAVS  BASIC  and 
STRUCTURAL  components,  JAVS  ASSIST  component  is  executed.  This  creates 
a sequential  file  (either  on  disk  or  tape)  of  record  size  133.  The 
file  may  be  blocked  or  unblocked.  The  file  consists  of  records  con- 
taining information  on  the  items,  modules,  and  line  numbers  in  the 
modules  in  which  the  items  are  set  or  used. 

Along  with  the  above  JAVS  output,  the  COMPOOL  source  file  is  input  to  the 
MA  dictionary  component.  This  file  must  be  a sequential  file  of 
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Figure  2-1.  Data  Item  Dictionary  Program  Operation 
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record  size  80,  blocked  or  unblocked.  Members  of  a partitioned  data 
set  may  be  concatenated  and  may  be  submitted  as  one  sequential  file. 
The  execution  of  this  produces  the  following  reports: 

1.  A cross  reference  of  all  the  valid  C0MP00L  items  under  the 
table  name  to  which  they  belong. 

2.  A cross  reference  of  all  the  C0MP00L  items  that  do  not 
belong  to  any  specific  table  under  the  table  name  'NONE' . 

3.  A report  on  all  the  C0MP00L  items  locally  (duplicately) 
defined. 

4.  A report  on  all  the  C0MP00L  items  not  referenced  in  any 
modules  (table  names  are  omitted  in  this  report  even  if  they 
are  not  referenced). 


SECTION  3 - PROGRAM  INPUTS 


The  MA  data  dictionary  build  does  not  require  any  control  cards  for 
operation.  The  only  input  required  is  the  COMPOOL  source  file  and 
JAVS  output  file  discussed  in  the  following  sections. 

3.1  DATA  SETS 

3.1.1  COMPOOL  Source  File 

This  is  a sequential  file  containing  records  fixed  in  length,  with  an 
80-byte  record  size.  The  records  may  be  blocked.  No  checking  is  done 
for  the  validity  of  COMPOOL  source  format.  Only  item  and  table  names 
are  picked  and  formatted  into  a separate  temporary  data  set.  The 
presence  or  absence  of  valid  COMPOOL  symbols  (e.g.,  START,  TERM,  BEGIN, 
and  END)  and  comment  cards  will  have  no  impact  on  the  processing  of 
the  data  dictionary  component.  The  DD  name  for  this  file  is  COMPOOL. 

If  the  file  is  catalogued,  the  user  need  only  specify  the  name  by  a 
' CMPL='  keyword  while  executing  the  procedure.  If  the  file  is  not 
catalogued,  the  user  must  override  the  '//COMPOOL'  DD  card  with  the 
appropriate  UNIT  and  VOLUME  parameters. 

3.1.2  JAVS  Output  File 

This  is  the  file  created  as  a result  of  running  the  JAVS  ASSIST  component. 
This  is  a sequential  file  with  a record  size  of  133,  and  may  be  blocked. 

The  file  is  assumed  to  be  valid  with  appropriate  header  and  trailer 
information  and  item/module  cross  reference  in  the  middle.  The  important 
header  the  data  dictionary  component  looks  for  is  'SYMBOL  MODULE...' 
printed  by  JAVS  ASSIST  at  the  beginning  of  the  cross  reference  report. 

The  trailer  that  the  data  dictionary  component  looks  for  is  'COMMAND  IS....* 


printed  at  the  end  of  cross  reference.  JAVS  output,  however,  contains 
some  header  information  preceding  the  header  this  component  looks  for 
and  some  trailer  information  succeeding  the  trailer  information  proc- 
essed by  the  Data  Dictionary  component. 


3.2  JOB  CONTROL  LANGUAGE 

A procedure  as  listed  in  Section  3.2.1  below  is  catalogued  in 

SYS2.PR0CLIB.  The  JCL  necessary  to  execute  the  Data  Dictionary 

component  using  this  procedure  is  as  follows: 

//JOB  CARD 
//  EXEC  MACABLD, 

//  CMPL= ' XXX ' , 

//  JAVS= ' XXX' , 

//  JAVSIZ=NNN, 

//  CMPSIZ=NNN, 

//  ERRFIL= 'XXX* , 

//  SRTLIB='XXX' 

/* 


where 

CMPL  = The  complete  name  of  the  COMPOOL  source  file.  This  must 
be  a catalogued  data  set.  If  this  is  not  a catalogued 
set  or  if  more  than  one  file  is  to  be  input,  the  DD  card 
that  must  be  overridden  is  '//COMPOOL'. 

JAVS  = The  complete  name  of  the  file  created  in  JAVS  ASSIST  run. 

This  must  be  a catalogued  sequential  data  set.  The  DD 
card  that  has  to  be  overridden  if  this  set  is  not  catalogued 
is  '//JAVSFILE' . 

JAVSIZ  = A decimal  number  indicating  the  number  of  tracks  of  scratch 
disk  space  required  to  process  the  JAVS  file.  This  number 
has  to  be  at  least  1/8  of  size  of  the  JAVS  file.  That  is,  if 
the  JAVS  file  created  in  the  ASSIST  component  contains 
64  tracks  of  data,  JAVSIZ  must  be  8 or  more. 

CMPSIZ  = The  scratch  disk  space  in  tracks  needed  to  process  COMPOOL 
source.  This  number  must  be  at  least  1/4  the  size  of 
COMPOOL  source. 

ERRFIL  = The  complete  name  of  the  error  message  file.  This  must  be 
a catalogued  partitioned  data  set. 

SRTLIB  s The  name  of  the  sort  library. 
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An  example  of  JCL  to  execute  the  MA  dictionary  build  is  given  below 
in  which  the  following  options  are  chosen: 

• COMPOOL  source  is  contained  in  the  members  APSTAB,  DBAF, 
DBAJ,  and  DBAO  of  the  catalogued  data  set  'OPCX.COMPOOL. 
SRC.T1016' 

e JAVS  file  is  the  catalogued  data  set  'MACA.JAVS.APXREF', 

• The  size  of  JAVS  file  ’MACA.JAVS.APXREF*  is  80  Tracks. 

• The  size  of  the  four  members  APSTAB,  DBAF,  DBAJ,  and  DBAO 
of  the  partitioned  data  set  ' OPCX . COMPOOL . SRC .T1016 ' is 
40  tracks.  (The  user  need  not  bother  counting  the  size  of 
members  of  the  PDS  not  used  during  the  execution.) 

e The  name  of  the  error  message  file  is 
' SPCX . LIB . ERROR . CURRENT ’ 

e The  name  of  the  sort  library  is  ' SYS1 . SORTLIB ' 

//MATEST  JOB  CARD 
//TEST  EXEC  MACABLD. 

//  JAVS* ’ MACA . JAVS . XREF ' , 

//  JAVSIZ*10, 

//  CMPSIZ=10, 

//  ERRFIL*' SPCX. LIB. ERROR. CURRENT' , 

//  SRTLIB* ' SYS1 . SORTLIB ' 

//C0MP00L  DD  DSN= ’ OPCX . COMPOOL . SRC .T1016( APSTAB ) ' , 

//  DISP=SHR 

//  DD  DSN* 1 OPCX . COMPOOL . SRC . T1016 ( DBAF ) * , 

//  DISP*SHR 

//  DD  DSN* 'OPCX. COMPOOL. SRC. T1016( DBAJ)',. 

//  DISP=SHR 

//  DD  DSN* ' OPCX . COMPOOL . SRC . T1016( DBAO) * , 

//  DISP*SHR 
/* 

// 

3.2.1  MACABLD  Procedure 


The  procedure  'MACABLD'  catalogued  in  'SYS2.PR0CLIB'  to  execute  the 
data  item  dictionary  component  is  shown  on  the  following  page. 
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//MACABLD  PROC  CMPL*  ,JAVS=  ,JAVSIZ=100,CMPSIZ=S0,ERRFIL=  .SRTLIB* 

II* 

//* 

//*  MACABLD  l’ROC  LAST  UPDATE  ON  10/4/78 

II* 

//*  MACABLD  PROCEDURE  MAY  BL  USED  IN  CONNECTION  WITH 
//*  DATA  DICTIONARY  BUILD  JOB  STEP.  IT  IS  ASSUMED  THAT  PRIOR  TO 
II*  THE  EXECUTION  OF  THIS  STEP  THAT  TWO  SEQUENTIAL  (OR  MEMBERS  OF 
II*  PDS)  FILES,  I.E.,  COMPOOL  SOURCE  6 JAVS  CROSS  REFERENCE  FILE 
II*  WERE  CREATED.  THE  FOLLOWING  IS  A DESCRIPTION  OF  THE  KEY  WORDS 
II* 

II* 

II*  CMPL=THE  NAME  OF  THE  COMPOOL  SOURCE  FILE(MUST  BE  A SEQUENTIAL 
II*  DATA  SET  OR  MEMBER  OF  PDS) 

II* 

II*  JAVS=NAME  OF  JAVS  CROSS  REFERENCE  FILE  (MUST  BE  SEQUENTIAL 
II*  OR  MEMBER  OF  PDS) 

If* 

II*  JAVSIZ=THE  SIZE  IN  TRACKS  NEEDED  FOR  WORK  FILES.  THIS  MAY  BE 
II*  AS  LITTLE  AS  1/8  OF  JAVS  CROSS  REFERENCE  FILE  SIZE 

II* 

II*  CMPSIZ=THE  SIZE  IN  TRACKS  NEEDED  FOR  WORK  FILES  FOR  PROCESSING 
II*  COMPOOL  SOURCE.  THIS  MAY  BE  AS  LITTLE  AS  1/4TH  OF 

II*  COMPOOL  SIZE 

II* 

II*  ERRFIL=THE  NAME  OF  ERROR  MESSAGE  FILE  (THIS  MUST  BE  A PDS) 

II* 

II*  SRTLIB=THE  NAME  OF  THE  SORT  LIBRARY. 

II* 

//DATBLD  EXEC  PGM=MADDB ,REGION=200K 
//STEPLIB  DD  DSN=MA . LOAD . V01 ,DISP=SHR 

//MATRIXGD  DD  SYS0UT=A,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330) 
//MATRIXEX  DD  SYS0UT=A,DCB=(RECFM=FBA,LRECL=133 ,BLKSIZE=1330) 
//SYSPRIN1  DD  SYS0UT=A,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330) 
//JAVSFORM  DD  DSN* 6SJAVFRM,DISP=( NEW, PASS ) ,UNIT=SYSDA, 

//  SPACE* (TRK.&JAVSIZ), 

//  DCB* ( RECFM=FB , LRECL=16 , DSORG=PS , BLKSIZE*  3520 ) 

//COMPOOL  DD  DSN=6CMPL,DISP*SHR 

//POOLOUT  DD  DSN*  66CMPLSR , DISP= ( NEW , PASS ) ,UNIT=SYSDA , 

//  SPACE* ( TRK , 6CMPS IZ ) , 

//  DCB=(RECFM=FB,LRECL=20,DSORG=PS,BLKSIZE=3520) 

//DUPREPRT  DD  SYS0UT=A,DCB*(RECFM=FBA,LRECL=133,BLKSIZE=1330) 
//ERROUT  DD  SYS0UT*A,DCB=(RECFM=FBA,LRECL*133 ,BLKSIZE*1330) 
//ERRMSGS  DD  DSN*6ERRFIL,DISP=SHR 
//JAVSFILE  DD  DSN=6JAVS,DISP=SHR 

// POOLIN  DD  DSN*66CMPLUN ,DCB=(RECFM=FB,LRECL=20 ,ELKSIZE=3520) 

//  UNIT=SYSDA, 

//  SPACE* ( TRK, 6CMPSIZ), 

//  DISP=( NEW, PASS) 

//POOLWKOl  DD  UNIT=SYSDA, SPACE* (TRK,6CMPSIZ),DSN=S6TST1 
//POOLWK02  DD  UNIT=SYSDA, SPACE* ( TRK, 6CMPSIZ) ,DSN=SSTST2 
//P00LWK03  DD  UNIT*SYSDA, SPACE* (TRK, 6CMPSIZ) ,DSN=6STST3 
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//SYSOUT  DD  SYSOUT=A 

//UNFREPRT  DD  SYS0UT=A,DCB=(RECFM=FBA,LRi:CL=133,BLKSIZE=1330) 
//SORTLIB  DD  DSN=6SRTLIB,DISP=SHR 
//SYSUDUMP  DD  SYSOUT = A 


SECTION  4 - PROGRAM  OUTPUTS 


The  data  item  dictionary  build  output  consists  of  a series  of  reports 
ar.  outlined  in  the  following  sections. 

4.1  CROSS  REFERENCE  REPORT  OF  VALID  COMPOOL  ITEMS 

This  report  is  printed  table  by  table  for  all  the  COMPOOL  items.  The 
report  contains  table  name,  item  names,  and  module  names  with  S,  U,  B, 
or  a blank  indicating  that  an  item  is  set,  used,  or  both  in  the  module. 

A sample  output  is  given  in  Figure  4-1.  The  DD  name  for  this  file  is 
MATRIXGD. 

4.2  CROSS  REFERENCE  REPORT  OF  COMPOOL  ITEMS  WITH  EXCEPTIONS 

The  first  two  letters  of  the  COMPOOL  items  are  not  the  same  as  the  table 
name  they  belong  to. 

The  items  and  modules  are  printed  with  set,  used,  or  both  indicators 
(S,  U,  or  B)  under  the  table.  A sample  output  is  shown  in  Figure  4-2. 

The  DD  name  is  MATRIXEX. 

4.3  UNREFERENCED  COMPOOL  ITEM  REPORT 

A listing  of  all  the  COMPOOL  items  not  referenced  in  any  modules  is  given 
in  this  report.  Unreferenced  table  names,  however,  are  not  included  in 
this  report.  A sample  output  is  given  in  Figure  4-3,  The  DD  name  is 
UNFREPRT. 

4.4  LOCALLY  DEFINED  ITEM  REPORT 

This  report  is  printed  for  all  the  COMPOOL  items  locally  defined.  A 
sample  output  is  given  in  Figure  4-4.  The  DD  name  for  this  is  DUPREPRT . 
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Figure  4-1,  Cross  Reference  Matrix  of  Valid  COMPOOL  Items 
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Figure  4-2.  Cross  Reference  Matrix  of  COMPOOL 
Items  With  Exceptions 
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Figure  4-3.  Unreferenced  Item  Report 
4-4 


mi s PA®  IS  MST  QUALITY  FftACTlGASUt 

TRIM  00*Y  I5HJT  ro  DDC 


THE  F(Jl  LOWING  r.'iHPQ.II  I T f M S A^E  CUPLICATELY  DEFINED: 


11  PM 

TAdLE 

MCI  HI  11 

c,ET/USrD/3nTH-S,U,  CR  B 

VP*B  A 

VONF 

APT,  IMS 

S 

YPMBA 

ACNE 

APSNIM 

U 

V P*M  A 

KRttf 

AP5.  M<P 

U 

Figure  4-4 


Locally  Defined  Item  Report 


section  5 - DIACNOSTICS 

Diagnostic  messages  generated  in  the  MA  Data  Dictionary  Component  are 
given  in  Table  5-1.  The  probable  cause  and  the  recommended  user 
actions  are  also  given. 
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MA109  Write  error  in  MADPRP  module  Fatal  Same  as  MA104 


MESSAGE  NUMBER  - MESSAGE  TEXT  TYPE  PROBABLE  CAUSE  AND  USER  ACTION 


